Vlastnosti objektu v excelu

Otázka od: Vondracek, Jan

26. 11. 2003 13:07

Ahoj,

nedavno se tu psalo o necem podobnem, ale nevim, jestli se konference
dobrala vysledku.

Napriklad ramecek kolem bunky je OK:
 
ExcelApp.Workbooks[1].Worksheets[1].Range['A1:E6'].BorderAround(xlContinuous
, xlThin, xlAutomatic);

Sirka sloupce nebo format bunky uz ale nefunguje:
  ExcelApp.Workbooks[1].Columns('H:I').ColumnWidth:=12.43;
  
ExcelApp.Workbooks[1].Worksheets[1].Cells(30,9).NumberFormat:='#,##0.00_
;[Red]-#,##0.00 ';

Primo v excelu to funguje, ale tady to vraci chybu: method columns not
supported by automation object

Nevite, co s tim? Diky za rady!

Honza




----------
* www.inMail.sk - Vasa emailova adresa na cely zivot ZDARMA
* Mail neobsahuje virusy. Zkontrolovane antivirusom NOD32 (www.eset.sk)
* www.SlovakNET.sk - profesionalny webhosting, domena .SK ZADARMO
* Zoner Media Explorer 5 - stiahnite si pomocnika pre digitalnu fotografiu
(zme.zoner.sk)

Odpovedá: kexo

26. 11. 2003 13:36

columns nie je metoda, ale vlastnost, teda musis pouzit lomene zatvorky [],
podobne ako pri range
to iste plati aj pre cells
kexo

----- Original Message -----
From: "Vondracek, Jan" <jvondracek@lear.com>
To: <delphi-l@clexpert.cz>
Sent: Wednesday, November 26, 2003 12:54 PM
Subject: Vlastnosti objektu v excelu


> Ahoj,
>
> nedavno se tu psalo o necem podobnem, ale nevim, jestli se konference
> dobrala vysledku.
>
> Napriklad ramecek kolem bunky je OK:
>
>
ExcelApp.Workbooks[1].Worksheets[1].Range['A1:E6'].BorderAround(xlContinuous
> , xlThin, xlAutomatic);
>
> Sirka sloupce nebo format bunky uz ale nefunguje:
> ExcelApp.Workbooks[1].Columns('H:I').ColumnWidth:=12.43;
>
ExcelApp.Workbooks[1].Worksheets[1].Cells(30,9).NumberFormat:='#,##0.00_
> ;[Red]-#,##0.00 ';
>
> Primo v excelu to funguje, ale tady to vraci chybu: method columns not
> supported by automation object
>
> Nevite, co s tim? Diky za rady!
>
> Honza
>





----------
* www.inMail.sk - Vasa emailova adresa na cely zivot ZDARMA
* Mail neobsahuje virusy. Zkontrolovane antivirusom NOD32 (www.eset.sk)
* www.SlovakNET.sk - profesionalny webhosting, domena .SK ZADARMO
* Zoner Media Explorer 5 - stiahnite si pomocnika pre digitalnu fotografiu
(zme.zoner.sk)

Odpovedá: Ludek Paral

26. 11. 2003 15:30

Ahoj,

uplnou nahodou delam i formatovani (on si Excel obcas dela z cisel
datumy...) :

napriklad takto :
          Excel.Range[chr(65 + i) + IntToStr(Radek), chr(65 + i) +
IntToStr(Radek)].NumberFormat := '0';

ale jak se divam na Tvuj priklad, tak pouzivas "trosku" nestandartni, asi
spis bude bud problem v tom, ze neni v seznamu formatu, nebo nekde delas
jinak format. Nebo nedela neplechu ta mezera na konci ??

Krome toho, v ceskem excelu je treba :
'# ##0 Kc;[cervene]-# ##0 Kc'

takze mas nekolik problemu :
1/ jak je nastaven oddelovac des.m. v narodnim prostredi
2/jakou jazyk.mutaci MS Office mas
3/ nevim, zda objekt Cells ma vlastnost Numberformat, mne vychazi, ze to ma
objekt Range....


-----Original Message-----
From: delphi-l-owner@clexpert.cz [mailto:delphi-l-owner@clexpert.cz]On
Behalf Of Vondracek, Jan
Sent: Wednesday, November 26, 2003 12:55 PM
To: delphi-l@clexpert.cz
Subject: Vlastnosti objektu v excelu


Ahoj,

nedavno se tu psalo o necem podobnem, ale nevim, jestli se konference
dobrala vysledku.

Napriklad ramecek kolem bunky je OK:

ExcelApp.Workbooks[1].Worksheets[1].Range['A1:E6'].BorderAround(xlContinuous
, xlThin, xlAutomatic);

Sirka sloupce nebo format bunky uz ale nefunguje:
  ExcelApp.Workbooks[1].Columns('H:I').ColumnWidth:=12.43;
  
ExcelApp.Workbooks[1].Worksheets[1].Cells(30,9).NumberFormat:='#,##0.00_
;[Red]-#,##0.00 ';

Primo v excelu to funguje, ale tady to vraci chybu: method columns not
supported by automation object

Nevite, co s tim? Diky za rady!

Honza






----------
* www.inMail.sk - Vasa emailova adresa na cely zivot ZDARMA
* Mail neobsahuje virusy. Zkontrolovane antivirusom NOD32 (www.eset.sk)
* www.SlovakNET.sk - profesionalny webhosting, domena .SK ZADARMO
* Zoner Media Explorer 5 - stiahnite si pomocnika pre digitalnu fotografiu
(zme.zoner.sk)

Odpovedá: Vondracek, Jan

26. 11. 2003 16:12

Diky, ale stejne to nejde ani takto:

  ExcelApp.Workbooks[1].Columns['H:I'].ColumnWidth:=12.43;
  
ExcelApp.Workbooks[1].Worksheets[1].Cells[30,9].NumberFormat:='#,##0.00_
;[Red]-#,##0.00 ';

Honza

-----Original Message-----
From: kexo [mailto:kexo@ynet.sk]
Sent: Wednesday, November 26, 2003 1:13 PM
To: delphi-l@clexpert.cz
Subject: Re: Vlastnosti objektu v excelu


columns nie je metoda, ale vlastnost, teda musis pouzit lomene zatvorky [],
podobne ako pri range
to iste plati aj pre cells
kexo

----- Original Message -----
From: "Vondracek, Jan" <jvondracek@lear.com>
To: <delphi-l@clexpert.cz>
Sent: Wednesday, November 26, 2003 12:54 PM
Subject: Vlastnosti objektu v excelu


> Ahoj,
>
> nedavno se tu psalo o necem podobnem, ale nevim, jestli se konference
> dobrala vysledku.
>
> Napriklad ramecek kolem bunky je OK:
>
>
ExcelApp.Workbooks[1].Worksheets[1].Range['A1:E6'].BorderAround(xlContinuous
> , xlThin, xlAutomatic);
>
> Sirka sloupce nebo format bunky uz ale nefunguje:
> ExcelApp.Workbooks[1].Columns('H:I').ColumnWidth:=12.43;
>
ExcelApp.Workbooks[1].Worksheets[1].Cells(30,9).NumberFormat:='#,##0.00_
> ;[Red]-#,##0.00 ';
>
> Primo v excelu to funguje, ale tady to vraci chybu: method columns not
> supported by automation object
>
> Nevite, co s tim? Diky za rady!
>
> Honza
>






----------
* www.inMail.sk - Vasa emailova adresa na cely zivot ZDARMA
* Mail neobsahuje virusy. Zkontrolovane antivirusom NOD32 (www.eset.sk)
* www.SlovakNET.sk - profesionalny webhosting, domena .SK ZADARMO
* Zoner Media Explorer 5 - stiahnite si pomocnika pre digitalnu fotografiu
(zme.zoner.sk)

Odpovedá: Pave Gazda

27. 11. 2003 7:48

Ahoj,
toto mi funguje:

Cell := GetColumnCharacters(S)+IntToStr(R);
...Worksheet.Range[Cell,Cell].NumberFormat := 'xxxx';

Cell := GetColumnCharacters(S)+'1';
...Worksheet.Range[Cell,Cell].ColumnWidth := Value;

Pavel

> ExcelApp.Workbooks[1].Columns['H:I'].ColumnWidth:=12.43;
>
ExcelApp.Workbooks[1].Worksheets[1].Cells[30,9].NumberFormat:='#,##0.00_
> ;[Red]-#,##0.00 ';
>
> Honza
>






----------
* www.inMail.sk - Vasa emailova adresa na cely zivot ZDARMA
* Mail neobsahuje virusy. Zkontrolovane antivirusom NOD32 (www.eset.sk)
* www.SlovakNET.sk - profesionalny webhosting, domena .SK ZADARMO
* Zoner Media Explorer 5 - stiahnite si pomocnika pre digitalnu fotografiu
(zme.zoner.sk)

Odpovedá: Vondracek, Jan

27. 11. 2003 9:31

Ahoj,

diky vsem za rady.
Musel jsem zmenit kulate zavorky na hranate. Pak jsem hodne zestrucnil ten
number format a musel jsem tam dat misto tecky carku.
U sirky sloupce jsem zapomnel na worksheets[1] a cpal jsem vlastnost columns
primo pod workbooks, takze to samozrejme nemohlo tuto vlastnost najit.

Nakonec mi funguje toto:
  ExcelApp.Workbooks[1].Worksheets[1].Columns['H:I'].ColumnWidth:=12;
  ExcelApp.Workbooks[1].Worksheets[1].Cells[30,9].NumberFormat:='0,00';

Honza


-----Original Message-----
From: Pave Gazda [mailto:pavel_gazda@datasw.cz]
Sent: Thursday, November 27, 2003 7:44 AM
To: delphi-l@clexpert.cz
Subject: Re: Vlastnosti objektu v excelu


Ahoj,
toto mi funguje:

Cell := GetColumnCharacters(S)+IntToStr(R);
...Worksheet.Range[Cell,Cell].NumberFormat := 'xxxx';

Cell := GetColumnCharacters(S)+'1';
...Worksheet.Range[Cell,Cell].ColumnWidth := Value;

Pavel

> ExcelApp.Workbooks[1].Columns['H:I'].ColumnWidth:=12.43;
>
ExcelApp.Workbooks[1].Worksheets[1].Cells[30,9].NumberFormat:='#,##0.00_
> ;[Red]-#,##0.00 ';
>
> Honza
>







----------
* www.inMail.sk - Vasa emailova adresa na cely zivot ZDARMA
* Mail neobsahuje virusy. Zkontrolovane antivirusom NOD32 (www.eset.sk)
* www.SlovakNET.sk - profesionalny webhosting, domena .SK ZADARMO
* Zoner Media Explorer 5 - stiahnite si pomocnika pre digitalnu fotografiu
(zme.zoner.sk)